inherited frmMnfCheckAcceptBill: TfrmMnfCheckAcceptBill
  Left = 362
  Top = 143
  Caption = #29983#20135#39564#25910#21333
  ClientHeight = 534
  ExplicitHeight = 580
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlDBCtrl: TPanel
    Height = 436
    ExplicitHeight = 436
    inherited pnlThirdtrade: TPanel
      inherited lblTTtraderid: TcxLabel
        AnchorX = 78
      end
      inherited cxLabel1: TcxLabel
        Left = 216
        ExplicitLeft = 216
        AnchorX = 244
      end
      inherited lblTTBalanceid: TcxLabel
        Left = 381
        ExplicitLeft = 381
        AnchorX = 433
      end
    end
    inherited lblName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited DtlPageCtrl: TcxPageControl
      Height = 341
      ExplicitHeight = 341
      ClientRectBottom = 341
      inherited tabMain: TcxTabSheet
        ExplicitHeight = 341
        inherited DtlGrid: TcxGrid
          Height = 341
          ExplicitHeight = 341
        end
      end
      inherited tsSum: TcxTabSheet
        ExplicitWidth = 872
        ExplicitHeight = 341
      end
    end
    inherited lblPrinted: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited dynlblCreate_by: TcxLabel
      AnchorX = 221
    end
    inherited dynlblCheck_by: TcxLabel
      AnchorX = 429
    end
    inherited dynlblFilid: TcxLabel
      AnchorX = 88
    end
    inherited dynlblDeptid: TcxLabel
      AnchorX = 301
    end
    inherited dynlblEmpid: TcxLabel
      AnchorX = 505
    end
    inherited dynlblBKind: TcxLabel
      AnchorX = 149
    end
  end
  inherited Panel1: TPanel
    inherited labFuncName: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited labFuncDesc: TcxLabel
      Style.IsFontAssigned = True
    end
  end
  inherited pnlBottom: TPanel
    Top = 480
    ExplicitTop = 480
    inherited lblDepotQty: TcxLabel
      Style.IsFontAssigned = True
    end
    inherited btnCancle: TcxButton
      TabOrder = 4
    end
    inherited btnOk: TcxButton
      TabOrder = 3
    end
    inherited btnCheck: TcxButton
      TabOrder = 1
    end
    inherited btnNew: TcxButton
      TabOrder = 2
    end
    inherited barBill: TcxProgressBar
      TabOrder = 8
    end
    object btnAssign: TcxButton
      Left = 311
      Top = 17
      Width = 100
      Height = 25
      Action = actAssign
      Anchors = [akRight, akBottom]
      Colors.Default = 16773345
      TabOrder = 0
    end
  end
  inherited MainDataSource: TDataSource
    Left = 221
    Top = 165
  end
  inherited ActionList1: TActionList
    object actAssign: TAction
      Caption = #38750#20849#32791#21697#20998#37197
      ImageIndex = 7
      OnExecute = actAssignExecute
    end
  end
  inherited pmExec: TPopupMenu
    Left = 392
    Top = 77
  end
  inherited cxStyleRepository1: TcxStyleRepository
    PixelsPerInch = 96
    inherited cxGridBandedTableViewStyleSheet1: TcxGridBandedTableViewStyleSheet
      BuiltIn = True
    end
  end
  inherited cdsMaster: TClientDataSet
    object cdsMasterbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsMasterbkind: TIntegerField
      FieldName = 'bkind'
    end
    object cdsMasterbstate: TIntegerField
      FieldName = 'bstate'
    end
    object cdsMasterbcode: TStringField
      FieldName = 'bcode'
      Size = 40
    end
    object cdsMasterbdate: TDateTimeField
      FieldName = 'bdate'
    end
    object cdsMasterworkshopid: TIntegerField
      FieldName = 'workshopid'
    end
    object cdsMastercreate_by: TIntegerField
      FieldName = 'create_by'
    end
    object cdsMasterempid: TIntegerField
      FieldName = 'empid'
    end
    object cdsMastercheck_by: TIntegerField
      FieldName = 'check_by'
    end
    object cdsMasterdeptid: TIntegerField
      FieldName = 'deptid'
    end
    object cdsMasterfilid: TIntegerField
      FieldName = 'filid'
    end
    object cdsMastervoucherid: TIntegerField
      FieldName = 'voucherid'
    end
    object cdsMasteramount: TFloatField
      FieldName = 'amount'
    end
    object cdsMasterexpensecost: TFloatField
      FieldName = 'expensecost'
    end
    object cdsMasterrawmaterialscost: TFloatField
      FieldName = 'rawmaterialscost'
    end
    object cdsMasterexpapportion: TBooleanField
      FieldName = 'expapportion'
    end
    object cdsMasterrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsMasterrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsMasterdptypeid: TIntegerField
      FieldName = 'dptypeid'
    end
    object cdsMastermanhour: TFloatField
      FieldName = 'manhour'
    end
    object cdsMastercustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsMastercustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsMastercustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsMastercustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsMastercustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsMastercustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsMastercustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsMastercustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsMastercustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsMastercustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsMastercustom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsMastercustom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsMastercustom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsMastercustom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsMastercustom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsMastercreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object cdsMasterupdate_time: TDateTimeField
      FieldName = 'update_time'
    end
    object cdsMastercheck_time: TDateTimeField
      FieldName = 'check_time'
    end
    object cdsMasterremark: TStringField
      FieldName = 'remark'
      Size = 200
    end
    object cdsMastervouchercode: TStringField
      FieldName = 'vouchercode'
      Size = 71
    end
    object cdsMasterworkshopname: TStringField
      FieldName = 'workshopname'
      Size = 60
    end
    object cdsMasterpjname: TWideStringField
      FieldName = 'pjname'
      Size = 60
    end
    object cdsMasterpjcode: TWideStringField
      FieldName = 'pjcode'
      Size = 40
    end
    object cdsMasterprojectid: TIntegerField
      FieldName = 'projectid'
    end
  end
  inherited cdsDetail: TClientDataSet
    BeforeDelete = cdsDetailBeforeDelete
    object cdsDetailbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsDetailbno: TIntegerField
      FieldName = 'bno'
    end
    object cdsDetailborderno: TIntegerField
      FieldName = 'borderno'
    end
    object cdsDetaildepotid: TIntegerField
      FieldName = 'depotid'
    end
    object cdsDetailproductid: TIntegerField
      FieldName = 'productid'
    end
    object cdsDetailcprice: TFloatField
      FieldName = 'cprice'
    end
    object cdsDetailbprice: TFloatField
      FieldName = 'bprice'
    end
    object cdsDetailbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object cdsDetailwasterqty: TFloatField
      FieldName = 'wasterqty'
    end
    object cdsDetailmanhour: TFloatField
      FieldName = 'manhour'
    end
    object cdsDetailempid: TIntegerField
      FieldName = 'empid'
    end
    object cdsDetailamount: TFloatField
      FieldName = 'amount'
    end
    object cdsDetailunitid: TIntegerField
      FieldName = 'unitid'
    end
    object cdsDetailquantity: TFloatField
      FieldName = 'quantity'
    end
    object cdsDetailprice: TFloatField
      FieldName = 'price'
    end
    object cdsDetailunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object cdsDetailunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object cdsDetailunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object cdsDetailassqty: TFloatField
      FieldName = 'assqty'
    end
    object cdsDetailrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object cdsDetailrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object cdsDetailexpensecost: TFloatField
      FieldName = 'expensecost'
    end
    object cdsDetailrawmaterialscost: TFloatField
      FieldName = 'rawmaterialscost'
    end
    object cdsDetailexpapportion: TBooleanField
      FieldName = 'expapportion'
    end
    object cdsDetailrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsDetailrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object cdsDetailrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsDetailrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object cdsDetailsaleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 60
    end
    object cdsDetailcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsDetailcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsDetailcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsDetailcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsDetailcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsDetailcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsDetailcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsDetailcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsDetailcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsDetailcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsDetailcustom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsDetailcustom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsDetailcustom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsDetailcustom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsDetailcustom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsDetailcreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object cdsDetailexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object cdsDetailassignqty: TFloatField
      FieldName = 'assignqty'
    end
    object cdsDetailassignamount: TFloatField
      FieldName = 'assignamount'
    end
    object cdsDetailbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object cdsDetailproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object cdsDetailvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object cdsDetailioqty: TFloatField
      FieldName = 'ioqty'
    end
    object cdsDetaillength: TFloatField
      FieldName = 'length'
    end
    object cdsDetailwidth: TFloatField
      FieldName = 'width'
    end
    object cdsDetailheight: TFloatField
      FieldName = 'height'
    end
    object cdsDetailspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object cdsDetailcustom16: TFloatField
      FieldName = 'custom16'
    end
    object cdsDetailcustom17: TFloatField
      FieldName = 'custom17'
    end
    object cdsDetailcustom18: TFloatField
      FieldName = 'custom18'
    end
    object cdsDetailcustom19: TFloatField
      FieldName = 'custom19'
    end
    object cdsDetailcustom20: TFloatField
      FieldName = 'custom20'
    end
    object cdsDetailqtitemid: TIntegerField
      FieldName = 'qtitemid'
    end
    object cdsDetailqtresultid: TIntegerField
      FieldName = 'qtresultid'
    end
    object cdsDetailqtdealresultid: TIntegerField
      FieldName = 'qtdealresultid'
    end
    object cdsDetailqtproblevid: TIntegerField
      FieldName = 'qtproblevid'
    end
    object cdsDetailqtworkerid: TIntegerField
      FieldName = 'qtworkerid'
    end
    object cdsDetailqtpickqty: TFloatField
      FieldName = 'qtpickqty'
    end
    object cdsDetailqtpickokqty: TFloatField
      FieldName = 'qtpickokqty'
    end
    object cdsDetailqtpickwasterqty: TFloatField
      FieldName = 'qtpickwasterqty'
    end
    object cdsDetailAllqty: TStringField
      FieldName = 'Allqty'
      Size = 30
    end
    object cdsDetailwasterrate: TFloatField
      FieldName = 'wasterrate'
    end
    object cdsDetailmachiningbdate: TDateTimeField
      FieldName = 'machiningbdate'
    end
    object cdsDetailrelationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object cdsDetailmakeqty: TFloatField
      FieldName = 'makeqty'
    end
    object cdsDetailuncompletedqty: TFloatField
      FieldName = 'uncompletedqty'
    end
    object cdsDetailunitmanhour: TFloatField
      FieldName = 'unitmanhour'
    end
    object cdsDetailp_kind: TIntegerField
      FieldName = 'p_kind'
    end
    object cdsDetailp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object cdsDetailp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object cdsDetailp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object cdsDetailp_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object cdsDetailp_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object cdsDetailp_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object cdsDetailp_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object cdsDetailp_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object cdsDetailp_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object cdsDetailp_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object cdsDetailp_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object cdsDetailp_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object cdsDetailp_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object cdsDetailp_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object cdsDetailproducttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object cdsDetailproducttrademarkid: TIntegerField
      FieldName = 'producttrademarkid'
    end
    object cdsDetaildepotcode: TStringField
      FieldName = 'depotcode'
      Size = 40
    end
    object cdsDetaildepotname: TWideStringField
      FieldName = 'depotname'
      Size = 60
    end
    object cdsDetailbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object cdsDetailunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object cdsDetailunitrate: TFloatField
      FieldName = 'unitrate'
    end
    object cdsDetailbaseunitname: TWideStringField
      FieldName = 'baseunitname'
      Size = 40
    end
    object cdsDetailunitassname: TWideStringField
      FieldName = 'unitassname'
      Size = 40
    end
    object cdsDetailproductpic: TBlobField
      FieldName = 'productpic'
    end
    object cdsDetailrelationwasterqty: TFloatField
      FieldName = 'relationwasterqty'
    end
    object cdsDetailchkqty: TFloatField
      FieldName = 'chkqty'
    end
    object cdsDetailuncompqty: TFloatField
      FieldName = 'uncompqty'
    end
  end
  inherited qryDetail: TUniQuery
    SQL.Strings = (
      
        'select d.*,cast(dbo.f_getallqty(d.productid,d.unit1qty,d.unit2qt' +
        'y,d.unit3qty) as varchar(30)) as Allqty '
      
        '     ,d.wasterqty/d.quantity*100 as wasterrate,d.wasterqty+d.qua' +
        'ntity as chkqty'
      '     ,rm.bdate as machiningbdate, rm.bcode as relationbcode'
      
        '     ,r.quantity as makeqty, r.quantity-r.completedqty+d.quantit' +
        'y as uncompletedqty'
      '     ,r.manhour/r.quantity as unitmanhour'
      
        '     ,p.kind p_kind,p.code p_code, p.name p_name, p.spec p_spec,' +
        ' p.abname p_abname'
      
        '     ,p.custom1 p_custom1, p.custom2 p_custom2, p.custom3 p_cust' +
        'om3, p.custom4 p_custom4, p.custom5 p_custom5 '
      
        '     ,p.custom6 p_custom6, p.custom7 p_custom7, p.custom8 p_cust' +
        'om8, p.custom9 p_custom9, p.custom10 p_custom10 '
      '     ,p.producttypeid, p.producttrademarkid'
      '     ,dt.code depotcode, dt.name depotname '
      
        '     ,u.barcode, u.unitname, u.rate unitrate, t.unitname as base' +
        'unitname,l.unitname as unitassname '
      '     ,cast(null as image) as productpic'
      '     from TB_MNFCHECKACCEPTDTL d'
      '     left join td_product p on d.productid=p.p_id'
      '     left join td_depot dt on d.depotid=dt.depotid'
      '     left join td_unitprice u on d.unitid=u.unitid'
      
        '     left join td_unitprice t on (d.productid=t.productid and t.' +
        'baseunit=1)   '
      
        '     left join td_unitprice l on (d.productid=l.productid and l.' +
        'u_no=0)       '
      
        '     left join tb_mnfmachining rm on d.relationbtype=1010 and d.' +
        'relationbid=rm.bid'
      
        '     left join tb_mnfmachiningdtl r on d.relationbtype=1010 and ' +
        'd.relationbid=r.bid and d.relationbno=r.bno'
      '     where d.bid=0')
    object qryDetailbid: TIntegerField
      FieldName = 'bid'
    end
    object qryDetailbno: TIntegerField
      FieldName = 'bno'
    end
    object qryDetailborderno: TIntegerField
      FieldName = 'borderno'
    end
    object qryDetaildepotid: TIntegerField
      FieldName = 'depotid'
    end
    object qryDetailproductid: TIntegerField
      FieldName = 'productid'
    end
    object qryDetailcprice: TFloatField
      FieldName = 'cprice'
    end
    object qryDetailbprice: TFloatField
      FieldName = 'bprice'
    end
    object qryDetailbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object qryDetailwasterqty: TFloatField
      FieldName = 'wasterqty'
    end
    object qryDetailmanhour: TFloatField
      FieldName = 'manhour'
    end
    object qryDetailempid: TIntegerField
      FieldName = 'empid'
    end
    object qryDetailamount: TFloatField
      FieldName = 'amount'
    end
    object qryDetailunitid: TIntegerField
      FieldName = 'unitid'
    end
    object qryDetailquantity: TFloatField
      FieldName = 'quantity'
    end
    object qryDetailprice: TFloatField
      FieldName = 'price'
    end
    object qryDetailunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object qryDetailunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object qryDetailunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object qryDetailassqty: TFloatField
      FieldName = 'assqty'
    end
    object qryDetailrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object qryDetailrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object qryDetailexpensecost: TFloatField
      FieldName = 'expensecost'
    end
    object qryDetailrawmaterialscost: TFloatField
      FieldName = 'rawmaterialscost'
    end
    object qryDetailexpapportion: TBooleanField
      FieldName = 'expapportion'
    end
    object qryDetailrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object qryDetailrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object qryDetailrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object qryDetailrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object qryDetailsaleorderbcode: TStringField
      FieldName = 'saleorderbcode'
      Size = 60
    end
    object qryDetailcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object qryDetailcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object qryDetailcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object qryDetailcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object qryDetailcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object qryDetailcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object qryDetailcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object qryDetailcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object qryDetailcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object qryDetailcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object qryDetailcustom11: TFloatField
      FieldName = 'custom11'
    end
    object qryDetailcustom12: TFloatField
      FieldName = 'custom12'
    end
    object qryDetailcustom13: TFloatField
      FieldName = 'custom13'
    end
    object qryDetailcustom14: TFloatField
      FieldName = 'custom14'
    end
    object qryDetailcustom15: TFloatField
      FieldName = 'custom15'
    end
    object qryDetailcreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object qryDetailexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object qryDetailassignqty: TFloatField
      FieldName = 'assignqty'
    end
    object qryDetailassignamount: TFloatField
      FieldName = 'assignamount'
    end
    object qryDetailbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object qryDetailproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object qryDetailvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object qryDetailioqty: TFloatField
      FieldName = 'ioqty'
    end
    object qryDetaillength: TFloatField
      FieldName = 'length'
    end
    object qryDetailwidth: TFloatField
      FieldName = 'width'
    end
    object qryDetailheight: TFloatField
      FieldName = 'height'
    end
    object qryDetailspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object qryDetailcustom16: TFloatField
      FieldName = 'custom16'
    end
    object qryDetailcustom17: TFloatField
      FieldName = 'custom17'
    end
    object qryDetailcustom18: TFloatField
      FieldName = 'custom18'
    end
    object qryDetailcustom19: TFloatField
      FieldName = 'custom19'
    end
    object qryDetailcustom20: TFloatField
      FieldName = 'custom20'
    end
    object qryDetailqtitemid: TIntegerField
      FieldName = 'qtitemid'
    end
    object qryDetailqtresultid: TIntegerField
      FieldName = 'qtresultid'
    end
    object qryDetailqtdealresultid: TIntegerField
      FieldName = 'qtdealresultid'
    end
    object qryDetailqtproblevid: TIntegerField
      FieldName = 'qtproblevid'
    end
    object qryDetailqtworkerid: TIntegerField
      FieldName = 'qtworkerid'
    end
    object qryDetailqtpickqty: TFloatField
      FieldName = 'qtpickqty'
    end
    object qryDetailqtpickokqty: TFloatField
      FieldName = 'qtpickokqty'
    end
    object qryDetailqtpickwasterqty: TFloatField
      FieldName = 'qtpickwasterqty'
    end
    object qryDetailAllqty: TStringField
      FieldName = 'Allqty'
      Size = 30
    end
    object qryDetailwasterrate: TFloatField
      FieldName = 'wasterrate'
    end
    object qryDetailmachiningbdate: TDateTimeField
      FieldName = 'machiningbdate'
    end
    object qryDetailrelationbcode: TStringField
      FieldName = 'relationbcode'
      Size = 40
    end
    object qryDetailmakeqty: TFloatField
      FieldName = 'makeqty'
    end
    object qryDetailuncompletedqty: TFloatField
      FieldName = 'uncompletedqty'
    end
    object qryDetailunitmanhour: TFloatField
      FieldName = 'unitmanhour'
    end
    object qryDetailp_kind: TIntegerField
      FieldName = 'p_kind'
    end
    object qryDetailp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object qryDetailp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object qryDetailp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object qryDetailp_abname: TWideStringField
      FieldName = 'p_abname'
      Size = 60
    end
    object qryDetailp_custom1: TStringField
      FieldName = 'p_custom1'
      Size = 100
    end
    object qryDetailp_custom2: TStringField
      FieldName = 'p_custom2'
      Size = 100
    end
    object qryDetailp_custom3: TStringField
      FieldName = 'p_custom3'
      Size = 100
    end
    object qryDetailp_custom4: TStringField
      FieldName = 'p_custom4'
      Size = 100
    end
    object qryDetailp_custom5: TStringField
      FieldName = 'p_custom5'
      Size = 100
    end
    object qryDetailp_custom6: TStringField
      FieldName = 'p_custom6'
      Size = 100
    end
    object qryDetailp_custom7: TStringField
      FieldName = 'p_custom7'
      Size = 100
    end
    object qryDetailp_custom8: TStringField
      FieldName = 'p_custom8'
      Size = 100
    end
    object qryDetailp_custom9: TStringField
      FieldName = 'p_custom9'
      Size = 100
    end
    object qryDetailp_custom10: TStringField
      FieldName = 'p_custom10'
      Size = 100
    end
    object qryDetailproducttypeid: TIntegerField
      FieldName = 'producttypeid'
    end
    object qryDetailproducttrademarkid: TIntegerField
      FieldName = 'producttrademarkid'
    end
    object qryDetaildepotcode: TStringField
      FieldName = 'depotcode'
      Size = 40
    end
    object qryDetaildepotname: TWideStringField
      FieldName = 'depotname'
      Size = 60
    end
    object qryDetailbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object qryDetailunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object qryDetailunitrate: TFloatField
      FieldName = 'unitrate'
    end
    object qryDetailbaseunitname: TWideStringField
      FieldName = 'baseunitname'
      Size = 40
    end
    object qryDetailunitassname: TWideStringField
      FieldName = 'unitassname'
      Size = 40
    end
    object qryDetailproductpic: TBlobField
      FieldName = 'productpic'
    end
    object qryDetailrelationwasterqty: TFloatField
      FieldName = 'relationwasterqty'
    end
    object qryDetailchkqty: TFloatField
      FieldName = 'chkqty'
    end
    object qryDetailuncompqty: TFloatField
      FieldName = 'uncompqty'
    end
  end
  inherited MainDataSet: TUniQuery
    SQL.Strings = (
      'select top 1 m.* '
      
        '     ,ct.name + '#39' '#39' + cast(aa.voucherno as varchar(10)) as vouch' +
        'ercode '
      '     ,w.name workshopname'
      '     from TB_MNFCHECKACCEPT m'
      '     left join tfb_voucher aa on (aa.voucherid=m.voucherid)'
      '     left join tfd_vouword ct on (ct.id=aa.vouwordid)'
      '     left join td_workshop w on m.workshopid=w.workshopid'
      '     where 1=1')
    object MainDataSetbid: TIntegerField
      FieldName = 'bid'
    end
    object MainDataSetbkind: TIntegerField
      FieldName = 'bkind'
    end
    object MainDataSetbstate: TIntegerField
      FieldName = 'bstate'
    end
    object MainDataSetbcode: TStringField
      FieldName = 'bcode'
      Size = 40
    end
    object MainDataSetbdate: TDateTimeField
      FieldName = 'bdate'
    end
    object MainDataSetworkshopid: TIntegerField
      FieldName = 'workshopid'
    end
    object MainDataSetcreate_by: TIntegerField
      FieldName = 'create_by'
    end
    object MainDataSetempid: TIntegerField
      FieldName = 'empid'
    end
    object MainDataSetcheck_by: TIntegerField
      FieldName = 'check_by'
    end
    object MainDataSetdeptid: TIntegerField
      FieldName = 'deptid'
    end
    object MainDataSetfilid: TIntegerField
      FieldName = 'filid'
    end
    object MainDataSetvoucherid: TIntegerField
      FieldName = 'voucherid'
    end
    object MainDataSetamount: TFloatField
      FieldName = 'amount'
    end
    object MainDataSetexpensecost: TFloatField
      FieldName = 'expensecost'
    end
    object MainDataSetrawmaterialscost: TFloatField
      FieldName = 'rawmaterialscost'
    end
    object MainDataSetexpapportion: TBooleanField
      FieldName = 'expapportion'
    end
    object MainDataSetrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object MainDataSetrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object MainDataSetdptypeid: TIntegerField
      FieldName = 'dptypeid'
    end
    object MainDataSetmanhour: TFloatField
      FieldName = 'manhour'
    end
    object MainDataSetcustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object MainDataSetcustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object MainDataSetcustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object MainDataSetcustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object MainDataSetcustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object MainDataSetcustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object MainDataSetcustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object MainDataSetcustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object MainDataSetcustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object MainDataSetcustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object MainDataSetcustom11: TFloatField
      FieldName = 'custom11'
    end
    object MainDataSetcustom12: TFloatField
      FieldName = 'custom12'
    end
    object MainDataSetcustom13: TFloatField
      FieldName = 'custom13'
    end
    object MainDataSetcustom14: TFloatField
      FieldName = 'custom14'
    end
    object MainDataSetcustom15: TFloatField
      FieldName = 'custom15'
    end
    object MainDataSetcreate_time: TDateTimeField
      FieldName = 'create_time'
    end
    object MainDataSetupdate_time: TDateTimeField
      FieldName = 'update_time'
    end
    object MainDataSetcheck_time: TDateTimeField
      FieldName = 'check_time'
    end
    object MainDataSetremark: TStringField
      FieldName = 'remark'
      Size = 200
    end
    object MainDataSetvouchercode: TStringField
      FieldName = 'vouchercode'
      Size = 71
    end
    object MainDataSetworkshopname: TStringField
      FieldName = 'workshopname'
      Size = 60
    end
    object MainDataSetprojectid: TIntegerField
      FieldName = 'projectid'
    end
    object MainDataSetpjcode: TWideStringField
      FieldName = 'pjcode'
      Size = 40
    end
    object MainDataSetpjname: TWideStringField
      FieldName = 'pjname'
      Size = 60
    end
  end
  object qryBatch: TUniQuery
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select b.*, O.BatchCode,O.ProductDate,O.ValidDate,'
      
        '     cast((O.Quantity + isnull(b.Quantity,0)) as decimal(18,4)) ' +
        'as NetQty,f.price'
      '     from tb_mnfcheckacceptbatch b'
      
        '     inner join tb_mnfcheckacceptrawmaterials d on b.bid=d.bid a' +
        'nd b.bno=d.bno and b.bdtlno=d.bdtlno'
      
        '     inner join tb_mnfmachiningbatch O on d.Relationbid=O.bid an' +
        'd b.relationpid=O.relationpid'
      '     inner join tt_bill f on O.relationpid=f.tid'
      '     where b.bid=0'
      '     Order By O.relationpid')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 188
    Top = 373
    object qryBatchbid: TIntegerField
      FieldName = 'bid'
    end
    object qryBatchbno: TIntegerField
      FieldName = 'bno'
    end
    object qryBatchbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object qryBatchrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object qryBatchquantity: TFloatField
      FieldName = 'quantity'
    end
    object qryBatchrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object qryBatchrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object qryBatchrelationbdtlno: TIntegerField
      FieldName = 'relationbdtlno'
    end
    object qryBatchBatchCode: TStringField
      FieldName = 'BatchCode'
      Size = 200
    end
    object qryBatchProductDate: TDateTimeField
      FieldName = 'ProductDate'
    end
    object qryBatchValidDate: TDateTimeField
      FieldName = 'ValidDate'
    end
    object qryBatchNetQty: TFloatField
      FieldName = 'NetQty'
    end
    object qryBatchprice: TFloatField
      FieldName = 'price'
    end
  end
  object qryRawMaterials: TUniQuery
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select m.*,'#39#21407#26448#26009#39' as typename,u.unitname,'
      
        '     m.quantity as oldqty ,cast(b.drawqty-b.wastedqty as decimal' +
        '(18,4)) as monetqty,'#39'batchcode'#39' as inputbatch,'
      '     l.unitname as unitassname,p.code as p_code,'
      
        '     p.name as p_name,p.spec as p_spec,u.barcode,b.drawqty as fd' +
        'rawqty,'
      
        '     cast(b.drawqty- b.wastedqty+m.quantity as decimal(18,4)) as' +
        ' nouseqty,'
      
        '     cast(b.drawqty*m.price as decimal(18,4)) as fdrawamt,cast((' +
        'b.drawqty- b.wastedqty+m.quantity)*m.price as decimal(18,2)) as ' +
        'nouseamt'
      '     from tb_mnfcheckacceptrawmaterials m'
      
        '     left join tb_mnfmachiningrawmaterials b on (m.relationbid=b' +
        '.bid and m.relationbno=b.bno and m.relationbdtlno=b.bdtlno and m' +
        '.productid=b.productid)'
      
        '     left join td_unitprice u on m.productid=u.productid and m.u' +
        'nitid=u.unitid'
      
        '     left join td_unitprice l on (l.u_no=0 and m.productid=l.pro' +
        'ductid)'
      '     left join td_product p on m.productid=p.p_id'
      '     where m.bid=0'
      
        '     and m.productid not in(select subproductid from tb_mnfmachi' +
        'ningrawsub '
      
        '       where bid=m.relationbid and bno=m.relationbno and m.relat' +
        'ionbdtlno=bdtlno)'
      '     union all'
      
        '     select m.*,'#39#26367#20195#21697#39' as typename,u.unitname,m.quantity as oldqt' +
        'y ,'
      
        '     cast(b.drawqty-b.wastedqty as decimal(18,4)) as monetqty ,'#39 +
        'batchcode'#39' as inputbatch,'
      
        '     l.unitname as unitassname,p.code as p_code,p.name as p_name' +
        ','
      '     p.spec as p_spec,u.barcode,b.drawqty as fdrawqty,'
      
        '     cast(b.drawqty-b.wastedqty+m.quantity as decimal(18,4)) as ' +
        'nouseqty,'
      
        '     cast(b.drawqty*m.price as decimal(18,4)) as fdrawamt,cast((' +
        'b.drawqty- b.wastedqty+m.quantity)*m.price as decimal(18,2)) as ' +
        'nouseamt'
      '     from tb_mnfcheckacceptrawmaterials m'
      
        '     left join tb_mnfmachiningrawsub b on (m.relationbid=b.bid a' +
        'nd m.relationbno=b.bno and m.relationbdtlno=b.bdtlno and m.produ' +
        'ctid=b.subproductid)'
      
        '     left join td_unitprice u on m.productid=u.productid and m.u' +
        'nitid=u.unitid'
      
        '     left join td_unitprice l on (l.u_no=0 and m.productid=l.pro' +
        'ductid)'
      '     left join td_product p on m.productid=p.p_id'
      '     where m.bid=0'
      
        '     and m.productid in (select subproductid from tb_mnfmachinin' +
        'grawsub'
      
        '       where bid=m.relationbid and bno=m.relationbno and m.relat' +
        'ionbdtlno=bdtlno)')
    CachedUpdates = True
    Options.PrepareUpdateSQL = True
    Options.SetFieldsReadOnly = False
    Options.RequiredFields = False
    Options.QueryRecCount = True
    Options.AutoPrepare = True
    Left = 188
    Top = 429
    object qryRawMaterialsbid: TIntegerField
      FieldName = 'bid'
    end
    object qryRawMaterialsbno: TIntegerField
      FieldName = 'bno'
    end
    object qryRawMaterialsbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object qryRawMaterialsproductid: TIntegerField
      FieldName = 'productid'
    end
    object qryRawMaterialscprice: TFloatField
      FieldName = 'cprice'
    end
    object qryRawMaterialsbprice: TFloatField
      FieldName = 'bprice'
    end
    object qryRawMaterialsbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object qryRawMaterialsamount: TFloatField
      FieldName = 'amount'
    end
    object qryRawMaterialsunitid: TIntegerField
      FieldName = 'unitid'
    end
    object qryRawMaterialsquantity: TFloatField
      FieldName = 'quantity'
    end
    object qryRawMaterialsprice: TFloatField
      FieldName = 'price'
    end
    object qryRawMaterialsunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object qryRawMaterialsunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object qryRawMaterialsunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object qryRawMaterialsassqty: TFloatField
      FieldName = 'assqty'
    end
    object qryRawMaterialsrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object qryRawMaterialsbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object qryRawMaterialsproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object qryRawMaterialsvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object qryRawMaterialsrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object qryRawMaterialsrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object qryRawMaterialsrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object qryRawMaterialsrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object qryRawMaterialsrelationbdtlno: TIntegerField
      FieldName = 'relationbdtlno'
    end
    object qryRawMaterialsrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object qryRawMaterialsrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object qryRawMaterialscustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object qryRawMaterialscustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object qryRawMaterialscustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object qryRawMaterialscustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object qryRawMaterialscustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object qryRawMaterialscustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object qryRawMaterialscustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object qryRawMaterialscustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object qryRawMaterialscustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object qryRawMaterialscustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object qryRawMaterialscustom11: TFloatField
      FieldName = 'custom11'
    end
    object qryRawMaterialscustom12: TFloatField
      FieldName = 'custom12'
    end
    object qryRawMaterialscustom13: TFloatField
      FieldName = 'custom13'
    end
    object qryRawMaterialscustom14: TFloatField
      FieldName = 'custom14'
    end
    object qryRawMaterialscustom15: TFloatField
      FieldName = 'custom15'
    end
    object qryRawMaterialsioqty: TFloatField
      FieldName = 'ioqty'
    end
    object qryRawMaterialsexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object qryRawMaterialsassignqty: TFloatField
      FieldName = 'assignqty'
    end
    object qryRawMaterialsassignamount: TFloatField
      FieldName = 'assignamount'
    end
    object qryRawMaterialsworkprocid: TIntegerField
      FieldName = 'workprocid'
    end
    object qryRawMaterialslength: TFloatField
      FieldName = 'length'
    end
    object qryRawMaterialswidth: TFloatField
      FieldName = 'width'
    end
    object qryRawMaterialsheight: TFloatField
      FieldName = 'height'
    end
    object qryRawMaterialsspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object qryRawMaterialscustom16: TFloatField
      FieldName = 'custom16'
    end
    object qryRawMaterialscustom17: TFloatField
      FieldName = 'custom17'
    end
    object qryRawMaterialscustom18: TFloatField
      FieldName = 'custom18'
    end
    object qryRawMaterialscustom19: TFloatField
      FieldName = 'custom19'
    end
    object qryRawMaterialscustom20: TFloatField
      FieldName = 'custom20'
    end
    object qryRawMaterialswasterate: TFloatField
      FieldName = 'wasterate'
    end
    object qryRawMaterialstypename: TStringField
      FieldName = 'typename'
      Size = 6
    end
    object qryRawMaterialsunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object qryRawMaterialsoldqty: TFloatField
      FieldName = 'oldqty'
    end
    object qryRawMaterialsmonetqty: TFloatField
      FieldName = 'monetqty'
    end
    object qryRawMaterialsinputbatch: TStringField
      FieldName = 'inputbatch'
      Size = 9
    end
    object qryRawMaterialsunitassname: TWideStringField
      FieldName = 'unitassname'
      Size = 40
    end
    object qryRawMaterialsp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object qryRawMaterialsp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object qryRawMaterialsp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object qryRawMaterialsbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object qryRawMaterialsfdrawqty: TFloatField
      FieldName = 'fdrawqty'
    end
    object qryRawMaterialsnouseqty: TFloatField
      FieldName = 'nouseqty'
    end
    object qryRawMaterialsfdrawamt: TFloatField
      FieldName = 'fdrawamt'
    end
    object qryRawMaterialsnouseamt: TFloatField
      FieldName = 'nouseamt'
    end
    object qryRawMaterialsp_calc: TByteField
      FieldName = 'p_calc'
    end
  end
  object dspBatch: TDataSetProvider
    DataSet = qryBatch
    UpdateMode = upWhereKeyOnly
    BeforeUpdateRecord = dspBatchBeforeUpdateRecord
    Left = 252
    Top = 373
  end
  object dspRawMaterials: TDataSetProvider
    DataSet = qryRawMaterials
    UpdateMode = upWhereKeyOnly
    BeforeUpdateRecord = dspRawMaterialsBeforeUpdateRecord
    Left = 256
    Top = 445
  end
  object cdsBatch: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspBatch'
    OnNewRecord = cdsBatchNewRecord
    Left = 312
    Top = 373
    object cdsBatchbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsBatchbno: TIntegerField
      FieldName = 'bno'
    end
    object cdsBatchbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object cdsBatchrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object cdsBatchquantity: TFloatField
      FieldName = 'quantity'
    end
    object cdsBatchrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsBatchrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object cdsBatchrelationbdtlno: TIntegerField
      FieldName = 'relationbdtlno'
    end
    object cdsBatchBatchCode: TStringField
      FieldName = 'BatchCode'
      Size = 200
    end
    object cdsBatchProductDate: TDateTimeField
      FieldName = 'ProductDate'
    end
    object cdsBatchValidDate: TDateTimeField
      FieldName = 'ValidDate'
    end
    object cdsBatchNetQty: TFloatField
      FieldName = 'NetQty'
    end
    object cdsBatchprice: TFloatField
      FieldName = 'price'
    end
  end
  object cdsRawMaterials: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspRawMaterials'
    BeforeDelete = cdsRawMaterialsBeforeDelete
    OnNewRecord = cdsRawMaterialsNewRecord
    Left = 308
    Top = 433
    object cdsRawMaterialsbid: TIntegerField
      FieldName = 'bid'
    end
    object cdsRawMaterialsbno: TIntegerField
      FieldName = 'bno'
    end
    object cdsRawMaterialsbdtlno: TIntegerField
      FieldName = 'bdtlno'
    end
    object cdsRawMaterialsproductid: TIntegerField
      FieldName = 'productid'
    end
    object cdsRawMaterialscprice: TFloatField
      FieldName = 'cprice'
    end
    object cdsRawMaterialsbprice: TFloatField
      FieldName = 'bprice'
    end
    object cdsRawMaterialsbquantity: TFloatField
      FieldName = 'bquantity'
    end
    object cdsRawMaterialsamount: TFloatField
      FieldName = 'amount'
    end
    object cdsRawMaterialsunitid: TIntegerField
      FieldName = 'unitid'
    end
    object cdsRawMaterialsquantity: TFloatField
      FieldName = 'quantity'
    end
    object cdsRawMaterialsprice: TFloatField
      FieldName = 'price'
    end
    object cdsRawMaterialsunit1qty: TFloatField
      FieldName = 'unit1qty'
    end
    object cdsRawMaterialsunit2qty: TFloatField
      FieldName = 'unit2qty'
    end
    object cdsRawMaterialsunit3qty: TFloatField
      FieldName = 'unit3qty'
    end
    object cdsRawMaterialsassqty: TFloatField
      FieldName = 'assqty'
    end
    object cdsRawMaterialsrelationassqty: TFloatField
      FieldName = 'relationassqty'
    end
    object cdsRawMaterialsbatchcode: TStringField
      FieldName = 'batchcode'
      Size = 200
    end
    object cdsRawMaterialsproductdate: TDateTimeField
      FieldName = 'productdate'
    end
    object cdsRawMaterialsvaliddate: TDateTimeField
      FieldName = 'validdate'
    end
    object cdsRawMaterialsrelationcount: TByteField
      FieldName = 'relationcount'
    end
    object cdsRawMaterialsrelationbtype: TIntegerField
      FieldName = 'relationbtype'
    end
    object cdsRawMaterialsrelationbid: TIntegerField
      FieldName = 'relationbid'
    end
    object cdsRawMaterialsrelationbno: TIntegerField
      FieldName = 'relationbno'
    end
    object cdsRawMaterialsrelationbdtlno: TIntegerField
      FieldName = 'relationbdtlno'
    end
    object cdsRawMaterialsrelationpid: TIntegerField
      FieldName = 'relationpid'
    end
    object cdsRawMaterialsrelationqty: TFloatField
      FieldName = 'relationqty'
    end
    object cdsRawMaterialscustom1: TStringField
      FieldName = 'custom1'
      Size = 200
    end
    object cdsRawMaterialscustom2: TStringField
      FieldName = 'custom2'
      Size = 200
    end
    object cdsRawMaterialscustom3: TStringField
      FieldName = 'custom3'
      Size = 200
    end
    object cdsRawMaterialscustom4: TStringField
      FieldName = 'custom4'
      Size = 200
    end
    object cdsRawMaterialscustom5: TStringField
      FieldName = 'custom5'
      Size = 200
    end
    object cdsRawMaterialscustom6: TStringField
      FieldName = 'custom6'
      Size = 200
    end
    object cdsRawMaterialscustom7: TStringField
      FieldName = 'custom7'
      Size = 200
    end
    object cdsRawMaterialscustom8: TStringField
      FieldName = 'custom8'
      Size = 200
    end
    object cdsRawMaterialscustom9: TStringField
      FieldName = 'custom9'
      Size = 200
    end
    object cdsRawMaterialscustom10: TStringField
      FieldName = 'custom10'
      Size = 200
    end
    object cdsRawMaterialscustom11: TFloatField
      FieldName = 'custom11'
    end
    object cdsRawMaterialscustom12: TFloatField
      FieldName = 'custom12'
    end
    object cdsRawMaterialscustom13: TFloatField
      FieldName = 'custom13'
    end
    object cdsRawMaterialscustom14: TFloatField
      FieldName = 'custom14'
    end
    object cdsRawMaterialscustom15: TFloatField
      FieldName = 'custom15'
    end
    object cdsRawMaterialsioqty: TFloatField
      FieldName = 'ioqty'
    end
    object cdsRawMaterialsexplan: TStringField
      FieldName = 'explan'
      Size = 200
    end
    object cdsRawMaterialsassignqty: TFloatField
      FieldName = 'assignqty'
    end
    object cdsRawMaterialsassignamount: TFloatField
      FieldName = 'assignamount'
    end
    object cdsRawMaterialsworkprocid: TIntegerField
      FieldName = 'workprocid'
    end
    object cdsRawMaterialslength: TFloatField
      FieldName = 'length'
    end
    object cdsRawMaterialswidth: TFloatField
      FieldName = 'width'
    end
    object cdsRawMaterialsheight: TFloatField
      FieldName = 'height'
    end
    object cdsRawMaterialsspecificweight: TFloatField
      FieldName = 'specificweight'
    end
    object cdsRawMaterialscustom16: TFloatField
      FieldName = 'custom16'
    end
    object cdsRawMaterialscustom17: TFloatField
      FieldName = 'custom17'
    end
    object cdsRawMaterialscustom18: TFloatField
      FieldName = 'custom18'
    end
    object cdsRawMaterialscustom19: TFloatField
      FieldName = 'custom19'
    end
    object cdsRawMaterialscustom20: TFloatField
      FieldName = 'custom20'
    end
    object cdsRawMaterialswasterate: TFloatField
      FieldName = 'wasterate'
    end
    object cdsRawMaterialstypename: TStringField
      FieldName = 'typename'
      Size = 6
    end
    object cdsRawMaterialsunitname: TWideStringField
      FieldName = 'unitname'
      Size = 40
    end
    object cdsRawMaterialsoldqty: TFloatField
      FieldName = 'oldqty'
    end
    object cdsRawMaterialsmonetqty: TFloatField
      FieldName = 'monetqty'
    end
    object cdsRawMaterialsinputbatch: TStringField
      FieldName = 'inputbatch'
      Size = 9
    end
    object cdsRawMaterialsunitassname: TWideStringField
      FieldName = 'unitassname'
      Size = 40
    end
    object cdsRawMaterialsp_code: TStringField
      FieldName = 'p_code'
      Size = 40
    end
    object cdsRawMaterialsp_name: TWideStringField
      FieldName = 'p_name'
      Size = 60
    end
    object cdsRawMaterialsp_spec: TWideStringField
      FieldName = 'p_spec'
      Size = 60
    end
    object cdsRawMaterialsbarcode: TWideStringField
      FieldName = 'barcode'
      Size = 40
    end
    object cdsRawMaterialsfdrawqty: TFloatField
      FieldName = 'fdrawqty'
    end
    object cdsRawMaterialsnouseqty: TFloatField
      FieldName = 'nouseqty'
    end
    object cdsRawMaterialsfdrawamt: TFloatField
      FieldName = 'fdrawamt'
    end
    object cdsRawMaterialsnouseamt: TFloatField
      FieldName = 'nouseamt'
    end
    object cdsRawMaterialsp_calc: TByteField
      FieldName = 'p_calc'
    end
  end
end
